home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 31 / CD Expert nº 31 Unreal Mission Pack I.iso / PetWings / petwings.exe / PetWings.exe / RCDATA / 230 < prev    next >
Text File  |  1999-08-04  |  485b  |  56 lines
  1. STOP 100
  2.  
  3. SET_BULLET_OFFSET -14,-96
  4.  
  5. STOP 235
  6.  
  7. LABEL 1
  8.  
  9. STOP 100
  10.  
  11. GOSUB 2
  12.  
  13. STOP 100
  14.  
  15. GOSUB 3
  16.  
  17. STOP 100
  18.  
  19. GOSUB 2
  20.  
  21. STOP 100
  22.  
  23. GOSUB 3
  24.  
  25. GOTO_LABEL 1
  26.  
  27. //-----------------------------------------------------
  28.  
  29. //----- Wait while Going down
  30. LABEL 2
  31.  
  32. STOP 22
  33. STOP 40
  34. STOP 66
  35.  
  36. RETURN
  37.  
  38. //----- Wait while Going down + Photon
  39. LABEL 3
  40.  
  41. STOP 22
  42.  
  43. STOP 10
  44. REPEAT 35
  45. SHIFT_Y -7
  46. SHOOT 12
  47. STOP 2
  48. SHIFT_Y 7
  49. STOP 2
  50. REPEAT_END
  51. STOP 10
  52.  
  53. STOP 66
  54.  
  55. RETURN
  56.